home *** CD-ROM | disk | FTP | other *** search
/ Great Canadian Scientists / GCS_CD.iso / pc / gcsdata / memory_g.dxr / 00060_Frame 4 (Show Words).ls < prev    next >
Encoding:
Text File  |  1996-09-01  |  297 b   |  11 lines
  1. on enterFrame
  2.   global QuestionNum, Order, NumberOfQuestions
  3.   set QuestionNum to QuestionNum + 1
  4.   if QuestionNum > NumberOfQuestions then
  5.     Guess1Setup()
  6.   else
  7.     put line the value of line QuestionNum of Order of the text of cast "Words" into field "Question"
  8.     startTimer()
  9.   end if
  10. end
  11.